home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Apple Reference & Presen…rary 6 (Reseller Edition)
/
Apple Ref. & Pres. Lib.v6.0.toast
/
pc
/
3-Presentations
/
Apple Demos
/
Training
/
HyperCard 2.0 Training
/
•HC 2.0-2
/
card_21659.txt
< prev
next >
Wrap
Text File
|
1990-08-07
|
5KB
|
249 lines
-- card: 21659 from stack: in.0-2
-- bmap block id: 22021
-- flags: 0000
-- background id: 18737
-- name: MultipleWindows
----- HyperTalk script -----
-- This handler stores the name of the last card.
on goBack
go cd "Windows" of stack "Intro to HyperCard 2.0"
end goBack
on showRabbitWindows
repeat with n = 1 to 9
show btn ("b" & n)
PaintPict ("Rabbit-a"),cd,("b" & n)
wait 20
PaintPict ("Rabbit"),cd,("b" & n)
end repeat
PaintPict ("Rabbit-a"),cd,("b104")
hide btn "b10"
repeat with n = 10 down to 2
hide btn ("b" & n)
PaintPict ("Rabbit-a"),cd,("b" & (n -1))
end repeat
hide btn "b1"
end showRabbitWindows
-- part 1 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=217 top=217 right=260 bottom=267
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
----- HyperTalk script -----
on mouseUp
set cursor to none
push card
go stack "•HC 2.0-Anim5"
wait 10
doAnimate
wait 20
pop card
end mouseUp
-- part 2 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=208 top=191 right=276 bottom=275
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: b1
----- HyperTalk script -----
on mouseUp
hide me
end mouseUp
-- part 3 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=403 top=25 right=110 bottom=470
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: b2
----- HyperTalk script -----
on mouseUp
hide me
end mouseUp
-- part 4 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=62 top=142 right=227 bottom=129
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: b6
----- HyperTalk script -----
on mouseUp
hide me
end mouseUp
-- part 5 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=330 top=249 right=334 bottom=397
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: b9
----- HyperTalk script -----
on mouseUp
hide me
end mouseUp
-- part 6 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=166 top=86 right=171 bottom=233
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: b5
----- HyperTalk script -----
on mouseUp
hide me
end mouseUp
-- part 8 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=303 top=128 right=213 bottom=370
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: b4
----- HyperTalk script -----
on mouseUp
hide me
end mouseUp
-- part 9 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=23 top=33 right=118 bottom=90
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: b8
----- HyperTalk script -----
on mouseUp
hide me
end mouseUp
-- part 10 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=268 top=20 right=105 bottom=335
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: b10
----- HyperTalk script -----
on mouseUp
hide me
end mouseUp
-- part 12 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=411 top=150 right=235 bottom=478
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: b7
----- HyperTalk script -----
on mouseUp
hide me
end mouseUp
-- part 13 (button)
-- low flags: 80
-- high flags: 0000
-- rect: left=32 top=247 right=332 bottom=99
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: b3
----- HyperTalk script -----
on mouseUp
hide me
end mouseUp
-- part contents for background part 1
----- text -----
HyperCard 2.0 allows you to open as many windows as your computer’s memory will allow. The number of windows you can open on a Macintosh Plus computer with 1-megabyte of RAM will depend on the sizes of the windows and what they contain.